home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 December / 2004-12 CHIP.iso / Internet / The Bat! Professional 3.01 / thebat_professional.msi / Data1.cab / thebat.exe / 0 / RCDATA / TMSGMEMOEDITOR / TMSGMEMOEDITOR.txt
Text File  |  2004-10-12  |  3KB  |  158 lines

  1. object MsgMemoEditor: TMsgMemoEditor
  2.   Left = 32
  3.   Top = 183
  4.   Width = 339
  5.   Height = 264
  6.   BorderIcons = [biSystemMenu]
  7.   BorderStyle = bsSizeToolWin
  8.   Caption = 'MsgMemoEditor'
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   FormStyle = fsStayOnTop
  16.   OldCreateOrder = True
  17.   OnClose = FormClose
  18.   OnCloseQuery = FormCloseQuery
  19.   OnCreate = FormCreate
  20.   OnDestroy = FormDestroy
  21.   OnHide = FormHide
  22.   OnShow = FormShow
  23.   PixelsPerInch = 96
  24.   TextHeight = 13
  25.   object dTop: TDock97
  26.     Left = 0
  27.     Top = 0
  28.     Width = 331
  29.     Height = 34
  30.     object Toolbar: TToolbar97
  31.       Left = 0
  32.       Top = 0
  33.       Caption = 'Tools'
  34.       CloseButton = False
  35.       DockableTo = [dpTop]
  36.       DockedTo = dTop
  37.       DockPos = 0
  38.       FullSize = True
  39.       PopupMenu = mPopup
  40.       TabOrder = 0
  41.       object bSave: TToolbarButton97
  42.         Left = 0
  43.         Top = 0
  44.         Width = 30
  45.         Height = 30
  46.         Hint = 'Save'
  47.         ParentShowHint = False
  48.         ShowHint = True
  49.         OnClick = bSaveClick
  50.       end
  51.       object bCancel: TToolbarButton97
  52.         Left = 36
  53.         Top = 0
  54.         Width = 30
  55.         Height = 30
  56.         Hint = 'Clear'
  57.         ParentShowHint = False
  58.         ShowHint = True
  59.         OnClick = bCancelClick
  60.       end
  61.       object ToolbarSep971: TToolbarSep97
  62.         Left = 30
  63.         Top = 0
  64.       end
  65.     end
  66.   end
  67.   object eMemo: TMemo
  68.     Left = 0
  69.     Top = 34
  70.     Width = 331
  71.     Height = 196
  72.     Align = alClient
  73.     PopupMenu = mPopup
  74.     TabOrder = 1
  75.   end
  76.   object dFont: TFontDialog
  77.     Font.Charset = DEFAULT_CHARSET
  78.     Font.Color = clWindowText
  79.     Font.Height = -11
  80.     Font.Name = 'MS Sans Serif'
  81.     Font.Style = []
  82.     Left = 8
  83.     Top = 112
  84.   end
  85.   object mPopup: TPopupMenu
  86.     Left = 8
  87.     Top = 152
  88.     object mUndo: TMenuItem
  89.       Caption = '&Undo'
  90.       ShortCut = 32776
  91.     end
  92.     object N1: TMenuItem
  93.       Caption = '-'
  94.     end
  95.     object mCut: TMenuItem
  96.       Caption = 'Cu&t'
  97.       OnClick = mCutClick
  98.     end
  99.     object mCopy: TMenuItem
  100.       Caption = '&Copy'
  101.       OnClick = mCopyClick
  102.     end
  103.     object mPaste: TMenuItem
  104.       Caption = '&Paste'
  105.       OnClick = mPasteClick
  106.     end
  107.     object mDelete: TMenuItem
  108.       Caption = '&Delete'
  109.       OnClick = mDeleteClick
  110.     end
  111.     object N2: TMenuItem
  112.       Caption = '-'
  113.     end
  114.     object mSelectAll: TMenuItem
  115.       Caption = 'Select &All'
  116.       OnClick = mSelectAllClick
  117.     end
  118.     object N3: TMenuItem
  119.       Caption = '-'
  120.     end
  121.     object mSave: TMenuItem
  122.       Caption = '&Save memo'
  123.       ShortCut = 16467
  124.       OnClick = bSaveClick
  125.     end
  126.     object mClear: TMenuItem
  127.       Caption = 'C&lear memo'
  128.       ShortCut = 16430
  129.       OnClick = bCancelClick
  130.     end
  131.     object N4: TMenuItem
  132.       Caption = '-'
  133.     end
  134.     object mFont: TMenuItem
  135.       Caption = '&Font...'
  136.       OnClick = mFontClick
  137.     end
  138.     object mStayonTop: TMenuItem
  139.       Caption = 'Al&ways on top'
  140.       Checked = True
  141.       OnClick = mStayonTopClick
  142.     end
  143.     object mClose: TMenuItem
  144.       Caption = 'Close'
  145.       ShortCut = 27
  146.       Visible = False
  147.       OnClick = mCloseClick
  148.     end
  149.   end
  150.   object chkTimer: TTimer
  151.     Enabled = False
  152.     Interval = 500
  153.     OnTimer = chkTimerTimer
  154.     Left = 112
  155.     Top = 112
  156.   end
  157. end
  158.